CAAPlanetPerihelionAphelion_JupiterAphelion <-
function(k){
.Call("CAAPlanetPerihelionAphelion_JupiterAphelion", k)
}
